﻿<!--#include file="const.inc"-->
<%
'====================================================================
' 感谢使用晴天3G智能建站系统..
' 作者:梁永强.QQ:766750857
' 官方网址:wap.qt3g.com
' 声明:软件版权归作者所有,没有经过作者本人同意不得非法破解和传播本程序
'====================================================================
%>
<%	
select case v
case "0"
we0="<br/>"
%>
<card id="main" title="中国黄历"><p align="<%=qingtian.px%>">
<%
case "1"
zi="<span style=""color:#FF5500"">"
we="<div class=""footer"">"
sou="<div class=""block4"">"
dao="<div class=""navi"">"
we0="</div>"
%>
<title>中国黄历</title>
</head>
<body>
<!--#include virtual="/css.inc"-->
<%
End Select
%>
<%=dao%>黄历相传由轩辕黄帝创制，故称为黄历，它是在中国农历基础上产生出来的，带有许多表示当天吉凶的一种历法。<%=we0%><%=we%>
<%if v=1 then %>
<form action="chak.asp?sid=<%=sidd%>" method="post">
<%end if%>
黄历查询：<br/>
<select name="y" value="<%=year(date())%>">
<%for i=2006 to 2012%>
<option value="<%=i%>"><%=i%></option>
          <%next%>
        </select>年
<select name="m" value="<%=month(date())%>">
<%for i=1 to 12%>
<option value="<%=i%>"><%=i%></option>
          <%next%>
        </select>月
<select name="d" value="<%=day(date())%>">
<%for i=1 to 31%>
<option value="<%=i%>"><%=i%></option>
          <%next%>
        </select>日<br/>
<%if v=0 then %>
	<anchor>黄历查询
    	<go href="chak.asp?sid=<%=sidd%>" method='post'>
        <postfield name="y" value="$(y)"/>
        <postfield name="m" value="$(m)"/>
        <postfield name="d" value="$(d)"/>
    	</go>
	</anchor>
<%else%>
<input type="submit" value="黄历查询"/>
</form>
<%end if%>
<br/>
<%if v=1 then %>
<form action="chak.asp?act=xrz&amp;sid=<%=sidd%>" method="post">
<%end if%>
选日子：
<select name="upto" value="">
                <option value="90">三月以内</option>
                <option value="3">3天以内</option>
                <option value="7">一周以内</option>
                <option value="30">一月以内</option>
                <option value="180">半年内</option>
                <option value="365">今年内</option>
            </select><br/>
<select name="tp" value="">
             <option value="0" ="">宜</option>
             <option value="1" ="">忌</option>
           </select>
<select name="word" value="">
<option value="嫁娶" ="">嫁娶</option>
<option value="开市" ="">开市</option>
<option value="交易" ="">交易</option>
<option value="入宅" ="">入宅</option>
<option value="入学" ="">入学</option>
<option value="纳财" ="">纳财</option>
<option value="订盟" ="">订盟</option>
<option value="安门" ="">安门</option>
<option value="出行" ="">出行</option>
<option value="开光" ="">开光</option>
<option value="求嗣" ="">求嗣</option>
<option value="祈福" ="">祈福</option>
<option value="破土" ="">破土</option>
<option value="祭祀" ="">祭祀</option>
<option value="安葬" ="">安葬</option>
</select><br/>
<%if v=0 then %>
	<anchor>黄历查询
    	<go href="chak.asp?act=xrz&amp;sid=<%=sidd%>" method='post'>
        <postfield name="upto" value="$(upto)"/>
        <postfield name="tp" value="$(tp)"/>
        <postfield name="word" value="$(word)"/>
    	</go>
	</anchor>
<%else%>
<input type="submit" value="黄历查询"/>
</form>
<%end if%>
<%=we0%><%=sou%>
<a href='non.asp?sid=<%=sidd%>'>黄历名词解释</a>
<%
Response.Write we0
end Function
%>